home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 23 / Amiga Format AFCD23 (Feb 1998, Issue 107).iso / -seriously_amiga- / shareware / workbench / startupctrl2.30 / install_english < prev    next >
Text File  |  1997-12-01  |  3KB  |  78 lines
  1. ;
  2. ; Installer Script for StartupControl
  3. ; $VER: 1.0 (18.11.97)
  4. ;
  5.  
  6. (set @default-dest "C:")
  7.  
  8.  
  9.     (message "Welcome to the Installation script of StartupControl!\n\n"
  10.     "StartupControl is a \"multifunctional utility\" for your startup-sequence.\n"
  11.     "It was designed with the  intention  to offer direct control to  the boot-\n"
  12.     "process combined with easiest operation and much comfort.\n"
  13.     "With StartupControl you  can  get  information  about the status  of  your\n"
  14.     "computer and set a desired configuration every time your Amiga boots.\n\n"
  15.     "This script will install all needed files to your system.\n\n"
  16.     "Version to install:\n V2.30 (18. November 97)")
  17.  
  18.     (set src "StartupControl")
  19.     (complete 0)
  20.  
  21.      (set destdir (askdir  (prompt "Please select where StartupControl should be installed\n"
  22.                     "A drawer will NOT be created.")
  23.          (help @askdir-help)
  24.          (default "C:")))
  25.  
  26.     (complete 20)
  27.  
  28.      (set destdoc (askdir (prompt "Please select where to install the documentation\n"
  29.                       "A drawer will NOT be created.")
  30.          (help @askdir-help)
  31.          (default "Docs:")))
  32.  
  33.     (complete 40)
  34.  
  35.      (set doc (askchoice (prompt"Select which documentation do you want to install")
  36.      (help"No help available")
  37.      (choices "english guide" "german guide")))
  38.  
  39. ; Installation
  40.  
  41.     (complete 60)
  42.  
  43.      (copyfiles (prompt "Copying StartupControl...")
  44.             (help "No help available")
  45.             (source "StartupControl")
  46.             (dest destdir))
  47.  
  48.     (complete 80)
  49.  
  50.      (if doc  ((copyfiles (prompt "Copying german documentation...")
  51.                    (help "No help available")
  52.                    (source "StartupControl_ger.guide")
  53.                    (dest destdoc))
  54.              (copyfiles (prompt "Copying german documentation...")
  55.                    (help "No help available")
  56.                    (source "StartupControl_ger.guide.info")
  57.                    (dest destdoc)))
  58.  
  59.             ((copyfiles (prompt "Copying english documentation...")
  60.                    (help "No help available")
  61.                    (source "StartupControl_eng.guide")
  62.                    (dest destdoc))
  63.              (copyfiles (prompt "Copying english documentation...")
  64.                    (help "No help available")
  65.                    (source "StartupControl_eng.guide.info")
  66.                    (dest destdoc))))
  67.     (complete 100)
  68.  
  69.     (message "\nInstallation script complete!\n"
  70.            "StartupControl can be found in your "
  71.           "\"" destdir "\" "
  72.           "drawer\n\nTo use StartupControl, please add the following line\n to your startup-sequence after SetPatch:\n\n " (tackon destdir src) "\n\n"
  73.           "Read the documentation for further information about the usage\n of StartupControl and registration via ADSG.")
  74.  
  75.  
  76.     (exit (quiet))
  77.  
  78.